|
دنیای برنامه نویسی |
|||
|
چهار شنبه 18 بهمن 1391برچسب:, :: 14:45 :: نويسنده : Professor of Computer
متن برنامه:
CLS
10
INPUT "a=", a
LET bank = 0
FOR i = 1 TO a
IF i MOD a = 0 THEN
LET bank = bank + i
END IF
NEXT i
IF bank = a THEN
PRINT "kamel
ELSE
PRINT "no
END IF
PRINT "1.yes
PRINT "2.no
INPUT "aya edame midhid?", amad
IF amad = 1 THEN
GOTO 10
ELSE
PRINT
END IF
نظرات شما عزیزان: ثانیه های دلتنگی ...
 ساعت18:49---19 بهمن 1391
اره راسته.................
خب اهنگو عوض کردم.......
درباره وبلاگ  به وبلاگ من خوش آمدید وبلاگ من درباره ی کامپیوتر و برنامه نویسی است لطفا در وبلاگ من عضو شوید! آخرین مطالب آرشيو وبلاگ پيوندها
نويسندگان
|
|||
 |
تبادل
لینک هوشمند
